ulozeni/otevreni ListBoxu

Otázka od: Radek Szurman

7. 5. 2004 13:35

Ahoj,
nevite nekdo proc kdyz ukladam listbox pomoci
save.WriteComponent(Components[index]); bez obsahu tak to funguje normale
ale jak ho ulozim s obsahem nejakeho textu tak se pak uz spatky nenacte :

New := TComponent.Create(self);
RegisterClasses([TListBox]);
Stream := TFileStream.Create('c:\test.cdp',fmOpenRead);
while Stream.Position < Stream.Size do
begin
new:=Stream.ReadComponent(nil);
if (New.ClassName = 'TListBox') then begin
   LBOX := TListBox.Create(self);
   LBOX.Tag := 5;
   LBOX.Parent := Cil;
end;

tak to hodi chybu Error reading TListBox.Items.Strings: Control 'mujlistbox'
han no parent window, ukladam vice komponent do jednoho souboru a u tohoto
si nevim rady.

diky za cokoli

Radek Szurman